vbBinaryCompare = 0 (default)vbTextCompare = 1
In the following example the Add method fails on the last line because the key "b" already exists. If CompareMode were set to vbBinaryCompare a new key "B" (upper case) with a value of "Bentley" will be added to the dictionary. Code: <% Dim d Set d = CreateObject("Scripting.Dictionary")d.CompareMode = vbTextCompare d.Add "a", "Alvis" d.Add "b", "Buick"d.Add "c", "Cadillac" d.Add "B", "Bentley" 'fails here. %>